ConnectedColumns = {}
ConnectedColumns["MarkerGUID"] = 1341125559

function function_6()
	local myvar_2 = 1
	myvar_0 = GlobalObjManager["getObjectIds"](GlobalObjManager, myvar_2, ConnectedColumns["MarkerGUID"])
	myvar_2, ConnectedColumns["MarkerGUID"], {R4} = nil
	for loopvar1, loopvar2 in myvar_0 do 
	myvar_5 = GetObjectData(loopvar2, ObjData["room"])
		if (myvar_5 == -1) then
		return loopvar2
	end
	end
	local myvar_1 = 0
	return myvar_1
end

ConnectedColumns["FindMarkerObjectID"] = function_6

function function_9(param0, param1, param2)
	myvar_3 = GetObjectAttribute(param0, 5)
	local myvar_6 = 6
	myvar_4 = GetObjectAttribute(param0, myvar_6)
		if (myvar_3 == param1) then
			if (myvar_4 ~= param2) then
		else
				if (myvar_3 == param2) then
					if (myvar_4 == param1) then
				else
				end
				return True
			end
		end
	end
	local myvar_5 = False
	return myvar_5
end

ConnectedColumns["MarkerForTheseColumns"] = function_9

function function_12(param0, param1, param2, param3, param4)
	myvar_5 = nWorld["GetObjectsOnTile"](param2, param3, param4)
	for loopvar1, loopvar2 in myvar_5 do 
	myvar_12 = GetObjectData(loopvar2, ObjData["flags"])
		if (BitwiseAnd(myvar_12, 31) == 0) then
		myvar_13 = GetObjectData(loopvar2, ObjData["category"])
			if (myvar_13 ~= 8) then
				if (myvar_13 ~= 19) then
					if (myvar_13 ~= 20) then
						if (myvar_13 ~= 22) then
							if (myvar_13 ~= 26) then
								if (myvar_13 ~= 81) then
									if (myvar_13 ~= 88) then
										if (myvar_13 == 82) then
									else
										return False
									end
								end
							end
						end
					end
				end
			end
		end
	end
	
	myvar_13 = GlobalObjManager["getObjectGUIDFromObjectId"]
	myvar_13 = myvar_13(GlobalObjManager, loopvar2)
		if (myvar_13 == ConnectedColumns["MarkerGUID"]) then
		local myvar_6 = True
		local myvar_15 = False
			if (ConnectedColumns["MarkerForTheseColumns"](loopvar2, param0, param1) == myvar_15) then
			local myvar_14 = False
			return myvar_14
		end
	end
	end
		if (myvar_6 == False) then
			if (0 < ConnectedColumns["FindMarkerObjectID"]()) then
			myvar_12 = param3
			myvar_13 = param4
			local myvar_10 = True
				if (nWorld["MoveObjectToLocation"](ConnectedColumns["FindMarkerObjectID"](), param2, myvar_12, myvar_13) == myvar_10) then
				myvar_10 = ConnectedColumns["FindMarkerObjectID"]()
				myvar_12 = param0
				SetObjectAttribute(myvar_10, 5, myvar_12)
				myvar_10 = ConnectedColumns["FindMarkerObjectID"]()
				local myvar_11 = 6
				myvar_12 = param1
				SetObjectAttribute(myvar_10, myvar_11, myvar_12)
			end
		end
	end
	local myvar_8 = True
	return myvar_8
end

ConnectedColumns["CanConnectDir"] = function_12

function function_15(param0, param1, param2, param3, param4)
	myvar_6,myvar_7,myvar_8 = nWorld["GetObjectLocation"](param0)
		if (param2 == 0) then
	else
			if (param2 == 2) then
		else
				if (param2 == 4) then
			else
			end
		end
	end
	myvar_13 = nWorld["GetObjectsOnTile"]((myvar_6 - 2), (myvar_7 + 2), myvar_8)
	for loopvar1, loopvar2 in myvar_13 do 
		if (loopvar2 ~= param3) then
		myvar_18 = GlobalObjManager["getObjectGUIDFromObjectId"](GlobalObjManager, loopvar2)
			if (myvar_18 == param1) then
			myvar_19 = nWorld["GetTerrainElevationForObject"](loopvar2)
				if (myvar_19 == param4) then
					if (ConnectedColumns["CanConnectDir"](param0, loopvar2, (myvar_6 - 1), (myvar_7 + 1), myvar_8) ~= 0) then 
	

					return loopvar2
				else
					local myvar_20 = 0
					return myvar_20
				end
			end
		end
	end
	end
	local myvar_14 = 0
	return myvar_14
end

ConnectedColumns["ConnectByDir"] = function_15

function function_18(param0, param1, param2, param3, param4, param5, param6)
	myvar_7 = nWorld["GetObjectsOnTile"](param1, param2, param3)
	for loopvar1, loopvar2 in myvar_7 do 
		if (nil == param4) then
		myvar_12 = GetObjectData(param0, ObjData["room"])
			if (-1 < myvar_12) then
			for loopvar1, loopvar2 in nWorld["GetObjectsOnTile"](param5, param6, param3) do 
				if (loopvar2 == param0) then
				local myvar_18 = True
				return myvar_18
			end
			end
		else
			local myvar_13 = True
			return myvar_13
		end
	end
	end
	local myvar_8 = False
	return myvar_8
end

ConnectedColumns["FindObjectID"] = function_18

function function_21(param0, param1, param2, param3)
	local myvar_6 = 0
	; //SETLIST
		if (0 < param0) then
		myvar_6 = GlobalObjManager
	
			if (GlobalObjManager["verifyObjectId"](myvar_6, param0) ~= 0) then 
	

				if (param0 ~= param2) then
				myvar_6 = param0
				{}[1] = ConnectedColumns["ConnectByDir"](myvar_6, param1, 2, param2, param3)
				myvar_6 = param0
				{}[2] = ConnectedColumns["ConnectByDir"](myvar_6, param1, 0, param2, param3)
				myvar_6 = param0
				{}[3] = ConnectedColumns["ConnectByDir"](myvar_6, param1, 4, param2, param3)
				myvar_6 = param0
				{}[4] = ConnectedColumns["ConnectByDir"](myvar_6, param1, 6, param2, param3)
			end
			myvar_6 = param0
			SetObjectSemiAttribute(myvar_6, 4, {}[1])
			myvar_6 = param0
			SetObjectSemiAttribute(myvar_6, 2, {}[2])
			myvar_6 = param0
			SetObjectSemiAttribute(myvar_6, 3, {}[3])
			myvar_6 = param0
			local myvar_7 = 1
			SetObjectSemiAttribute(myvar_6, myvar_7, {}[4])
		end
	end
end

ConnectedColumns["ConnectSingle"] = function_21
